10 REM CREATE RELATIVE MESSAGE FILE
20 OPEN15,8,15:OPEN1,8,2,"MSGFILE1,L,"+CHR$(254)
30 PRINT#15,"P"+CHR$(98)+CHR$(145)+CHR$(1)+CHR$(1)
40 PRINT#1,"@END"
50 CLOSE1:CLOSE15
60 END